home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 February / EnigmA AMIGA RUN 15 (1997)(G.R. Edizioni)(IT)[!][issue 1997-02][PLANET CD V].iso / enigma / earcd / emula / arosdv19.lha / AROS / dos / getargstr.c < prev    next >
C/C++ Source or Header  |  1996-10-24  |  1KB  |  68 lines
  1. /*
  2.     (C) 1995-96 AROS - The Amiga Replacement OS
  3.     $Id: getargstr.c,v 1.4 1996/10/24 15:50:30 aros Exp $
  4.     $Log: getargstr.c,v $
  5.     Revision 1.4  1996/10/24 15:50:30  aros
  6.     Use the official AROS macros over the __AROS versions.
  7.  
  8.     Revision 1.3  1996/08/13 13:52:47  digulla
  9.     Replaced <dos/dosextens.h> by "dos_intern.h" or added "dos_intern.h"
  10.     Replaced AROS_LA by AROS_LHA
  11.  
  12.     Revision 1.2  1996/08/01 17:40:52  digulla
  13.     Added standard header for all files
  14.  
  15.     Desc:
  16.     Lang: english
  17. */
  18. #include <clib/exec_protos.h>
  19. #include "dos_intern.h"
  20.  
  21. /*****************************************************************************
  22.  
  23.     NAME */
  24.     #include <clib/dos_protos.h>
  25.  
  26.     AROS_LH0(STRPTR, GetArgStr,
  27.  
  28. /*  SYNOPSIS */
  29.  
  30. /*  LOCATION */
  31.     struct DosLibrary *, DOSBase, 89, Dos)
  32.  
  33. /*  FUNCTION
  34.     Returns a pointer to the argument string passed to the current
  35.     process at startup.
  36.  
  37.     INPUTS
  38.  
  39.     RESULT
  40.     Pointer to argument string.
  41.  
  42.     NOTES
  43.  
  44.     EXAMPLE
  45.  
  46.     BUGS
  47.  
  48.     SEE ALSO
  49.  
  50.     INTERNALS
  51.  
  52.     HISTORY
  53.     29-10-95    digulla automatically created from
  54.                 dos_lib.fd and clib/dos_protos.h
  55.  
  56. *****************************************************************************/
  57. {
  58.     AROS_LIBFUNC_INIT
  59.     AROS_LIBBASE_EXT_DECL(struct DosLibrary *,DOSBase)
  60.  
  61.     /* Get pointer to process structure */
  62.     struct Process *me=(struct Process *)FindTask(NULL);
  63.  
  64.     /* Nothing spectacular */
  65.     return me->pr_Arguments;
  66.     AROS_LIBFUNC_EXIT
  67. } /* GetArgStr */
  68.